www.gusucode.com > 中国货源网导航程序源码 1 > 中国货源网导航程序源码 1.0/8月11日备份/admin/index.asp
<!--#include file="mdb.asp"-->
<%
dim site
sql="select site from title"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,3
site=rs("site")
rs.close
set rs=nothing
Function getcode1()
Dim test
On Error Resume Next
Set test=Server.CreateObject("Adodb.Stream")
Set test=Nothing
If Err Then
Dim zNum
Randomize timer
zNum = cint(8999*Rnd+1000)
Session("GetCode") = zNum
getcode1= Session("GetCode")
Else
getcode1= "<img src=""getcode.asp"">"
End If
End Function
%>
<html>
<head>
<link href="css.css" rel="stylesheet" type="text/css">
<title><%=site%>--管理员登陆</title>
</head>
<BODY leftMargin=0 bgcolor="#D7FFD7" topMargin=2 marginheight="0" marginwidth="0" onkeydown=return(!(event.keyCode==78&&event.ctrlKey))>
<BR>
<BR>
<BR>
<form name="form1" method="post" action="chklogin.asp">
<table width="413" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#EEEAD6">
<tr>
<td height="29" colspan="3" background="images/topbg.gif">
<table width="95%" align="right" border="0" cellspacing="0" cellpadding="0">
<tr>
<td align="left" valign="middle"><font color="#FFFFFF"><B><%=site%>管理入口</B></font></td>
<td width="8%" align="right"><a href="#" onClick="javascript:window.open('about:blank','','width=640,height=300,left=100,top=10,scrollbars=yes')"><a href="http://gj28.com" target="_blank"><img src="images/help.gif" align="middle" border="0" alt="帮助文档"></a> </td>
</tr></table>
</td></tr>
<tr>
<td width="3" background="images/link.GIF"></td>
<td>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td>
<table width="95%" border="0" align="center">
<tr>
<td>
<fieldset><legend accesskey="F" align="left">登陆窗口</legend>
<table width="100%" border="0" cellspacing="2" cellpadding="2">
<tr>
<td width="10%"> </td>
<td width="20%">用 户 名：</td>
<td><input type="text" class="textarea" size="20" name="username"> </td></tr>
<tr>
<td width="10%"> </td>
<td width="20%">密 码：</td>
<td><input class="textarea" type="password" size="20" name="password"> </td></tr>
<tr>
<td width="10%"> </td>
<td width="20%">验 证 码：</td>
<td><input type="text" name="mofei" class="textarea" size="20"> <%=getcode1()%></td></tr>
<tr>
<td colspan="3" align="center"><input class="button" type="submit" value=" 登陆 " name="Submit">
<input name="reset" type="reset" class="Bsbttn" id="reset" value=" 重写 "> </td>
</tr>
</table>
</fieldset></td></tr>
</table>
</td></tr>
</table></td>
<td width="3" background="images/link.GIF"></td></tr>
<tr><td height="3" background="images/linkbom.GIF" colspan="3"></td></tr>
</table>
</form>
</body></html>